home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer (Italian) 48 / PC Gamer IT CD 48 2-2.iso / 1602 AD / 1602ad_demo.exe / GADDATA / TRADEGAD.DAT < prev    next >
Text File  |  1999-04-21  |  9KB  |  460 lines

  1.  
  2. ;---Spieler Definitionen---;
  3.   Objekt: GADGET
  4.  
  5.     BLK_TOOL  =   0
  6.   
  7.     COL_WHT =     255
  8.     COL_RED =     249
  9.     COL_BLK =     0
  10.  
  11.     ZEINR =       0
  12.  
  13.   ;---Default-Werte festlegen---;
  14.     @Nummer:    0
  15.     Id:         0
  16.     Blocknr:    BLK_TOOL
  17.     Gfxnr:      0
  18.     Kind:       GAD_UNUSED
  19.     ObjFill:    0,MAXGADGET
  20.  
  21.   ;========================================;
  22.   ;   Hier starten richtige Definitionen   ;
  23.   ;========================================;
  24.  
  25.     IDHAUPT     = 33001
  26.     IDNIX       = 33201
  27.  
  28.     GFXTAFEL    = 0
  29.     GFXPFEIL    = GFXTAFEL+1
  30.     GFXPLUS     = GFXPFEIL+4
  31.     GFXMAIN     = GFXPLUS+4
  32.         GFXMAP            = GFXMAIN+8
  33.         GFXHAUS     = GFXMAP+1
  34.     GFXPFEIL    = GFXHAUS+18
  35.     GFXBAUMAT   = GFXPFEIL+6
  36.     GFXMENU     = GFXBAUMAT+10
  37.     GFXOVERHEAD = GFXMENU+3
  38.     GFXPFEILV   = GFXOVERHEAD+2
  39.     GFXMENGE    = GFXPFEILV+4
  40.     GFXWARELEER = GFXMENGE+8
  41.     GFXWARE     = GFXWARELEER+4
  42.     GFXKONT     = GFXWARE+44
  43.  
  44. ;================HAUPT-GADGETS==================;
  45.  
  46.   ;---Warennamen und-preise, Stadt- und Schiffsnamen---;
  47.     @Nummer:    0
  48.     BASE =      Nummer
  49.     Id:         IDHAUPT+110
  50.     Kind:       GAD_TEXTL
  51.     Noselflg:   1
  52.     Blocknr:    ZEINR
  53.     Color:      0
  54.     Pos:        27, 420
  55.     Size:       1, 1
  56.  
  57.     @Nummer:    +1
  58.     ObjFill:    BASE
  59.     @Id:        +1
  60.     Kind:       GAD_TEXTR
  61.     Pos:        232, 420
  62.  
  63.     @Nummer:    +1
  64.     ObjFill:    BASE
  65.     @Id:        +1
  66.     Pos:        27, 650
  67.  
  68.     @Nummer:    +1
  69.     ObjFill:    BASE
  70.     @Id:        +1
  71.     Kind:       GAD_TEXTR
  72.     Pos:        232, 650
  73.  
  74.   ;---Aktueller Schiffsname---;
  75.     @Nummer:    +1
  76.     Id:         IDHAUPT+120
  77.     Kind:       GAD_GFX
  78.     Noselflg:   1
  79.     Gfxnr:      GFXOVERHEAD+1
  80.     Pos:        6, 585
  81.     Size:       244, 30
  82.  
  83.     @Nummer:    +1
  84.     Id:         IDHAUPT+121
  85.     Kind:       GAD_TEXTZ
  86.     Blocknr:    ZEINR
  87.     Color:      1, 0
  88.     Pos:        6, 585
  89.     Size:       244, 30
  90.     Posoffs:    124, 29
  91.  
  92.   ;---Name der Kontorstadt---;
  93.     @Nummer:    +1
  94.     Id:         IDHAUPT+122
  95.     Kind:       GAD_GFX
  96.     Noselflg:   1
  97.     Gfxnr:      GFXOVERHEAD
  98.     Pos:        6, 358
  99.     Size:       244, 30
  100.  
  101.     @Nummer:    +1
  102.     Id:         IDHAUPT+123
  103.     Kind:       GAD_TEXTZ
  104.     Noselflg:   1
  105.     Blocknr:    ZEINR
  106.     Color:      1, 0
  107.     Pos:        6, 358
  108.     Size:       244, 30
  109.     Posoffs:    124, 29
  110.  
  111.   ;---Waren kaufen, verkaufen---;
  112.     @Nummer:    +1
  113.     Id:         IDHAUPT+0
  114.     Kind:       GAD_GFX
  115.     Gfxnr:      GFXPFEILV
  116.     Pressoff:   2
  117.     Pos:        26, 529
  118.     Size:       51, 54
  119.     Posoffs:    0, 0
  120.     
  121.     @Nummer:    +1
  122.     Id:         IDHAUPT+1
  123.     Kind:       GAD_GFX
  124.     Gfxnr:      GFXPFEILV+1
  125.     Pressoff:   2
  126.     Pos:        186, 529
  127.     Size:       56, 54
  128.     Posoffs:    0, 0
  129.  
  130.   ;---Waremenge einstellen---;
  131.     @Nummer:    +1
  132.     BASE =      Nummer
  133.     Id:         IDHAUPT+2
  134.     Kind:       GAD_GFX
  135.     Basenr:     BASE
  136.     Reiheflg:   1
  137.     Gfxnr:      GFXMENGE
  138.     Pressoff:   4
  139.     Pos:        79, 544
  140.     Size:       19, 24
  141.     
  142.     @Nummer:    +1
  143.     Id:         IDHAUPT+3
  144.     Kind:       GAD_GFX
  145.     Basenr:     BASE
  146.     Reiheflg:   1
  147.     Gfxnr:      GFXMENGE+1
  148.     Pressoff:   4
  149.     Pos:        99, 542
  150.     Size:       22, 31
  151.     
  152.     @Nummer:    +1
  153.     Id:         IDHAUPT+4
  154.     Kind:       GAD_GFX
  155.     Basenr:     BASE
  156.     Reiheflg:   1
  157.     Gfxnr:      GFXMENGE+2
  158.     Pressoff:   4
  159.     Pos:        122, 540
  160.     Size:       27, 35
  161.     
  162.     @Nummer:    +1
  163.     Id:         IDHAUPT+5
  164.     Kind:       GAD_GFX
  165.     Basenr:     BASE
  166.     Reiheflg:   1
  167.     Gfxnr:      GFXMENGE+3
  168.     Pressoff:   4
  169.     Pos:        149, 537
  170.     Size:       32, 40
  171.  
  172.   ;---Warengrafiken Kontor (nicht wΣhlbar)---;
  173.     @Nummer:    +1
  174.     X =         28
  175.     Y =         420
  176.     BASE =      Nummer
  177.     Id:         IDHAUPT+10
  178.     Kind:       GAD_GFX
  179.     Noselflg:   1
  180.     Gfxnr:      GFXWARE
  181.     Pos:        X, Y
  182.     Size:       48, 46
  183.     
  184.     @Nummer:    +1
  185.     ObjFill:    BASE
  186.     @Id:        +1
  187.     @Pos:       +53, +0
  188.  
  189.     @Nummer:    +1
  190.     ObjFill:    BASE
  191.     @Id:        +1
  192.     @Pos:       +53, +0
  193.  
  194.     @Nummer:    +1
  195.     ObjFill:    BASE
  196.     @Id:        +1
  197.     @Pos:       +53, +0
  198.  
  199.     @Nummer:    +1
  200.     ObjFill:    BASE
  201.     @Id:        +1
  202.     Pos:        X, Y+54
  203.     
  204.     @Nummer:    +1
  205.     ObjFill:    BASE
  206.     @Id:        +1
  207.     @Pos:       +53, +0
  208.  
  209.     @Nummer:    +1
  210.     ObjFill:    BASE
  211.     @Id:        +1
  212.     @Pos:       +53, +0
  213.  
  214.     @Nummer:    +1
  215.     ObjFill:    BASE
  216.     @Id:        +1
  217.     @Pos:       +53, +0
  218.  
  219.   ;---Lagermenge Kontor (nicht wΣhlbar)---;
  220.     @Nummer:    +1
  221.     X =         70
  222.     Y =         423
  223.     BASE =      Nummer
  224.     Id:         IDHAUPT+130
  225.     Kind:       GAD_BALKEN
  226.     Noselflg:   1
  227.     Slidverflg: 1
  228.     Color:      COL_RED, COL_RED
  229.     Pos:        X, Y
  230.     Size:       4, 42
  231.     
  232.     @Nummer:    +1
  233.     ObjFill:    BASE
  234.     @Id:        +1
  235.     @Pos:       +53, +0
  236.  
  237.     @Nummer:    +1
  238.     ObjFill:    BASE
  239.     @Id:        +1
  240.     @Pos:       +53, +0
  241.  
  242.     @Nummer:    +1
  243.     ObjFill:    BASE
  244.     @Id:        +1
  245.     @Pos:       +53, +0
  246.  
  247.     @Nummer:    +1
  248.     ObjFill:    BASE
  249.     @Id:        +1
  250.     Pos:        X, Y+54
  251.     
  252.     @Nummer:    +1
  253.     ObjFill:    BASE
  254.     @Id:        +1
  255.     @Pos:       +53, +0
  256.  
  257.     @Nummer:    +1
  258.     ObjFill:    BASE
  259.     @Id:        +1
  260.     @Pos:       +53, +0
  261.  
  262.     @Nummer:    +1
  263.     ObjFill:    BASE
  264.     @Id:        +1
  265.     @Pos:       +53, +0
  266.  
  267.   ;---Warengadgets Kontor---;
  268.     @Nummer:    +1
  269.     X =         26
  270.     Y =         419
  271.     BASE =      Nummer
  272.     Id:         IDHAUPT+30
  273.     Kind:       GAD_GFX
  274.     Reiheflg:   1
  275.     Basenr:     BASE
  276.     Gfxnr:      GFXWARELEER+2
  277.     Pressoff:   1
  278.     Pos:        X, Y
  279.     Size:       48, 48
  280.     
  281.     @Nummer:    +1
  282.     ObjFill:    BASE
  283.     @Id:        +1
  284.     @Pos:       +53, +0
  285.  
  286.     @Nummer:    +1
  287.     ObjFill:    BASE
  288.     @Id:        +1
  289.     @Pos:       +53, +0
  290.  
  291.     @Nummer:    +1
  292.     ObjFill:    BASE
  293.     @Id:        +1
  294.     @Pos:       +53, +0
  295.  
  296.     @Nummer:    +1
  297.     ObjFill:    BASE
  298.     @Id:        +1
  299.     Pos:        X, Y+54
  300.     
  301.     @Nummer:    +1
  302.     ObjFill:    BASE
  303.     @Id:        +1
  304.     @Pos:       +53, +0
  305.  
  306.     @Nummer:    +1
  307.     ObjFill:    BASE
  308.     @Id:        +1
  309.     @Pos:       +53, +0
  310.  
  311.     @Nummer:    +1
  312.     ObjFill:    BASE
  313.     @Id:        +1
  314.     @Pos:       +53, +0
  315.  
  316.   ;---Warengrafiken Schiff (nicht wΣhlbar)---;
  317.     @Nummer:    +1
  318.     X =         28
  319.     Y =         649
  320.     BASE =      Nummer
  321.     Id:         IDHAUPT+50
  322.     Kind:       GAD_GFX
  323.     Noselflg:   1
  324.     Gfxnr:      GFXWARE
  325.     Pos:        X, Y
  326.     Size:       48, 46
  327.     
  328.     @Nummer:    +1
  329.     ObjFill:    BASE
  330.     @Id:        +1
  331.     @Pos:       +53, +0
  332.  
  333.     @Nummer:    +1
  334.     ObjFill:    BASE
  335.     @Id:        +1
  336.     @Pos:       +53, +0
  337.  
  338.     @Nummer:    +1
  339.     ObjFill:    BASE
  340.     @Id:        +1
  341.     @Pos:       +53, +0
  342.  
  343.     @Nummer:    +1
  344.     ObjFill:    BASE
  345.     @Id:        +1
  346.     Pos:        X, Y+54
  347.     
  348.     @Nummer:    +1
  349.     ObjFill:    BASE
  350.     @Id:        +1
  351.     @Pos:       +53, +0
  352.  
  353.     @Nummer:    +1
  354.     ObjFill:    BASE
  355.     @Id:        +1
  356.     @Pos:       +53, +0
  357.  
  358.     @Nummer:    +1
  359.     ObjFill:    BASE
  360.     @Id:        +1
  361.     @Pos:       +53, +0
  362.  
  363.   ;---Lagermenge Schiff (nicht wΣhlbar)---;
  364.     @Nummer:    +1
  365.     X =         70
  366.     Y =         651
  367.     BASE =      Nummer
  368.     Id:         IDHAUPT+90
  369.     Kind:       GAD_BALKEN
  370.     Noselflg:   1
  371.     Slidverflg: 1
  372.     Color:      COL_RED, COL_RED
  373.     Pos:        X, Y
  374.     Size:       4, 42
  375.     
  376.     @Nummer:    +1
  377.     ObjFill:    BASE
  378.     @Id:        +1
  379.     @Pos:       +53, +0
  380.  
  381.     @Nummer:    +1
  382.     ObjFill:    BASE
  383.     @Id:        +1
  384.     @Pos:       +53, +0
  385.  
  386.     @Nummer:    +1
  387.     ObjFill:    BASE
  388.     @Id:        +1
  389.     @Pos:       +53, +0
  390.  
  391.     @Nummer:    +1
  392.     ObjFill:    BASE
  393.     @Id:        +1
  394.     Pos:        X, Y+54
  395.     
  396.     @Nummer:    +1
  397.     ObjFill:    BASE
  398.     @Id:        +1
  399.     @Pos:       +53, +0
  400.  
  401.     @Nummer:    +1
  402.     ObjFill:    BASE
  403.     @Id:        +1
  404.     @Pos:       +53, +0
  405.  
  406.     @Nummer:    +1
  407.     ObjFill:    BASE
  408.     @Id:        +1
  409.     @Pos:       +53, +0
  410.  
  411.   ;---Warengadgets Schiff---;
  412.     @Nummer:    +1
  413.     X =         26
  414.     Y =         648
  415.     BASE =      Nummer
  416.     Id:         IDHAUPT+70
  417.     Kind:       GAD_GFX
  418.     Reiheflg:   1
  419.     Basenr:     BASE
  420.     Gfxnr:      GFXWARELEER+2
  421.     Pressoff:   1
  422.     Pos:        X, Y
  423.     Size:       48, 48
  424.     
  425.     @Nummer:    +1
  426.     ObjFill:    BASE
  427.     @Id:        +1
  428.     @Pos:       +53, +0
  429.  
  430.     @Nummer:    +1
  431.     ObjFill:    BASE
  432.     @Id:        +1
  433.     @Pos:       +53, +0
  434.  
  435.     @Nummer:    +1
  436.     ObjFill:    BASE
  437.     @Id:        +1
  438.     @Pos:       +53, +0
  439.  
  440.     @Nummer:    +1
  441.     ObjFill:    BASE
  442.     @Id:        +1
  443.     Pos:        X, Y+54
  444.     
  445.     @Nummer:    +1
  446.     ObjFill:    BASE
  447.     @Id:        +1
  448.     @Pos:       +53, +0
  449.  
  450.     @Nummer:    +1
  451.     ObjFill:    BASE
  452.     @Id:        +1
  453.     @Pos:       +53, +0
  454.  
  455.     @Nummer:    +1
  456.     ObjFill:    BASE
  457.     @Id:        +1
  458.     @Pos:       +53, +0
  459.  
  460. EndObj;